$ IF F$MODE() .EQS. "BATCH" THEN SET PROCESS/NAME= "A New GERM"
$ SET DEF [QPLOT.GERM.SOURCE]
$ PAS MAIN
$ LINK/EXE=GERM.EXE/MAP=GERM.MAP MAIN,QLIBHOME:QPLOT/LIB
